← Index
NYTProf Performance Profile   
For /usr/share/koha/opac/cgi-bin/opac/opac-search.pl
  Run on Tue Oct 15 17:10:45 2013
Reported on Tue Oct 15 17:12:56 2013

Filename(eval 1131)[/usr/share/perl/5.10/CGI.pm:869]
StatementsExecuted 8 statements in 21µs
Eval Invoked At/usr/share/perl/5.10/CGI.pm line 869
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
22219µs47µsCGI::::script_nameCGI::script_name
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1
# spent 47µs (19+28) within CGI::script_name which was called 2 times, avg 24µs/call: # once (14µs+26µs) by CGI::url at line 832 of CGI.pm # once (5µs+2µs) by CGI::url at line 10 of (eval 1127)[CGI.pm:869]
package CGI; sub script_name {
224µs26µs my ($self,@p) = self_or_default(@_);
# spent 6µs making 2 calls to CGI::self_or_default, avg 3µs/call
322µs if (@p) {
4 $self->{'.script_name'} = shift @p;
5 } elsif (!exists $self->{'.script_name'}) {
613µs122µs my ($script_name,$path_info) = $self->_name_and_path_from_env();
# spent 22µs making 1 call to CGI::_name_and_path_from_env
712µs $self->{'.script_name'} = $script_name;
8 }
9210µs return $self->{'.script_name'};
10}
11
12;